home *** CD-ROM | disk | FTP | other *** search
/ Resource for Source: C/C++ / Resource for Source - C-C++.iso / codelib2 / v_02_09 / 2n09023a < prev    next >
Encoding:
Text File  |  1995-11-01  |  197 b   |  11 lines
  1.  
  2.  
  3.  
  4. LOCKRECORD
  5. WHILE NOT retval AND ERRORCODE()=9
  6.     MESSAGE "Please wait, record has been locked by "+ERRORUSER()
  7.     SLEEP 1000  ; IMPORTANT!  Wait one second.
  8.     LOCKRECORD
  9. ENDWHILE
  10.  
  11.